home *** CD-ROM | disk | FTP | other *** search
/ Hráč 1999 January / Hrac_26_1999-01_cd1.bin / Demos / Uprising 2 / data1.cab / game_art / grids / Demo.hzs < prev    next >
Text File  |  1998-11-06  |  12KB  |  398 lines

  1. START_SCRIPT_FILE
  2.  
  3. VDECL VINT DONE_SETUP 0
  4. VDECL VINT PLAYER_SLOT     0
  5. VDECL VINT MISSION_FAILED  0
  6. VDECL VINT SOLDIER_COUNT 0
  7. VDECL VINT TANK_COUNT 0
  8. VDECL VINT AAV_COUNT 0
  9. VDECL VINT LTUR_COUNT 0
  10. VDECL VINT HTUR_COUNT 0
  11. VDECL VINT GOTSECOND 0
  12. VDECL VINT GOTBONUS 0
  13. VDECL    VINT CITADEL_TIMER 0
  14. VDECL VINT CITADEL_SWITCH 0
  15. VDECL VINT BUILD_COUNT 0
  16. VDECL VINT CIT0OWNED 0
  17. VDECL VINT ALLFOUR 0
  18. VDECL VINT BRIDGE 0
  19. VDECL VLOC ALPHA LOC (0,0,0)
  20.  
  21. IF ( VBL_TEST DONE_SETUP EQUAL 0 ) THEN
  22. (
  23.     SET_USE_DEFAULT_VICTORY 0
  24.     CHANGE_VBL DONE_SETUP SET 1
  25.  
  26.     CHANGE_VBL LFL_SETTINGS IMPERIUM_ATTACK_RATE SET 999999999
  27.     CHANGE_VBL LFL_SETTINGS AAV_RATE SET 99999999
  28.  
  29.     IMP_GRAB_CITADEL 3
  30.     IMP_GRAB_CITADEL 2
  31.     IMP_GRAB_CITADEL 0
  32.  
  33.     FREE_UNITS 0 SOLDIER 5
  34.     FREE_UNITS 0 AI_TANK 5
  35.     FREE_UNITS 0 AAV 5
  36.     FREE_UNITS 0 BOMBER 5
  37.     FREE_UNITS 0 PLR_LIGHTTANK 5
  38.  
  39.     DEBRIEF_SUMMARY {The Trich now have firm control of the outpost.  Upon hearing of your failure, your entire family commited honorable suicide and your dog is denying any knowledge of you.  We'd send you to the salt mines, but we're afraid you'd screw that up too.  Go back to the training mission, commander, and wallow in your shame.}
  40.     DEBRIEF_PRIMARY 0 0 {All Wraiths were lost.}
  41.     DEBRIEF_SECONDARY 0 0 {All Wraiths were lost.}
  42.     DEBRIEF_BONUS 0 0 {All Wraiths were lost.}
  43.  
  44.     CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  45.     CHANGE_VBL CITADEL_TIMER ADD 5
  46. )
  47.  
  48.  
  49.  
  50. IF ( OR (( NOT ( CLOSE_PT HTANK 0 LOC (200, 204, 0) 32 ) ) ( VBL_TEST GAME_TIME GREATER_THAN 180 )) ) THEN
  51. (
  52.     CHANGE_VBL CITADEL_SWITCH SET 11
  53. )
  54.  
  55.     
  56.     SWITCH CITADEL_SWITCH
  57.     (    
  58.         CASE 0:
  59.         (
  60.             IF(NOT(CLOSE_PT HTANK0 LOC(200,204,0) 5))THEN
  61.             (
  62.                 IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  63.                 (
  64.                     SHOW_BILLBOARD {Follow the nav point to the first claim square.}
  65.                     SET_NAV_POINT LOC(200,204,0) ON
  66.                     IF(VBL_TEST CITADEL_TIMER LESS_THAN 15)THEN
  67.                     (
  68.         
  69.                         CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  70.                         CHANGE_VBL CITADEL_TIMER ADD 15
  71.                     )
  72.                 )
  73.             )
  74.             ELSE
  75.             (
  76.                 SET_NAV_POINT LOC(200,204,0) OFF
  77.                 SHOW_BILLBOARD {Now press F11 to call in your citadel. (or use the "F" key")}
  78.                 IF(CITADEL_OWNED 0 4)THEN
  79.                 (                    
  80.                     CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  81.                     CHANGE_VBL CITADEL_TIMER ADD 12
  82.                     CHANGE_VBL CITADEL_SWITCH SET 1
  83.                 )
  84.             )
  85.         )
  86.  
  87.         CASE 1:
  88.         (
  89.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  90.             (
  91.                 COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 SUB BUILD_COUNT
  92.                 IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  93.                 (
  94.                     COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 TUB BUILD_COUNT
  95.                     IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  96.                     (
  97.                         COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 AUB BUILD_COUNT
  98.                         IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  99.                         (
  100.                             COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 BUB BUILD_COUNT
  101.                             IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  102.                             (
  103.                                 COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 ENERGY_BLDG BUILD_COUNT
  104.                                 IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  105.                                 (
  106.                                     IF(PLAYER_PROPS 0 IN_OVERHEAD_MAP)THEN
  107.                                     (
  108.                                         GOTO_OVERHEAD 0
  109.                                         SHOW_BILLBOARD {Call in some buildings by using the menu buttons.}
  110.                                         CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  111.                                         CHANGE_VBL CITADEL_TIMER ADD 8
  112.                                     )
  113.                                     ELSE
  114.                                     (
  115.                                         SHOW_BILLBOARD {You'll need some buildings.  Press "R" to go to the radar map.} 6
  116.                                         CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  117.                                         CHANGE_VBL CITADEL_TIMER ADD 20
  118.                                     )
  119.                                 )
  120.                             )
  121.                         )
  122.                     )
  123.                 )
  124.             )
  125.             IF(VBL_TEST BUILD_COUNT GREATER_THAN 0) THEN
  126.             (
  127.                 CHANGE_VBL CITADEL_SWITCH SET 2
  128.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  129.                 CHANGE_VBL CITADEL_TIMER ADD 5
  130.     
  131.             )    
  132.         )
  133.         CASE 2:
  134.         (
  135.             IF(PLAYER_PROPS 0 IN_OVERHEAD_MAP)THEN
  136.             (
  137.                 GOTO_OVERHEAD 0
  138.                 SHOW_BILLBOARD {Now press "R" again or "ESC" to get back to the action.} 3
  139.             )
  140.             CHANGE_VBL CITADEL_SWITCH SET 3
  141.             CHANGE_VBL BUILD_COUNT SET 0
  142.     
  143.         )
  144.         CASE 3:
  145.         (
  146.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  147.             (
  148.                 COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 TURRET BUILD_COUNT
  149.                 IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  150.                 (
  151.                     COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 SAMS BUILD_COUNT
  152.                     IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  153.                     (
  154.                         COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 LIGHT_TURRET BUILD_COUNT
  155.                         IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  156.                         (
  157.                             SHOW_BILLBOARD {Your base needs some turrets.  I suggest three Gattling Turrets (F7) and a SAM Launcher (F9). (or use the "f" key)} 8
  158.                             CHANGE_VBL CITADEL_TIMER SET GAME_TIME 
  159.                             CHANGE_VBL CITADEL_TIMER ADD 15
  160.                             CHANGE_VBL CITADEL_SWITCH SET 4
  161.                         )
  162.                     )
  163.  
  164.                 )
  165.             )
  166.             IF(VBL_TEST BUILD_COUNT GREATER_THAN 0)THEN
  167.             (
  168.                 CHANGE_VBL CITADEL_SWITCH SET 5
  169.             )
  170.         )
  171.         CASE 4:
  172.         (
  173.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  174.             (
  175.                 COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 TURRET BUILD_COUNT
  176.                 IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  177.                 (
  178.                     COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 SAMS BUILD_COUNT
  179.                     IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  180.                     (
  181.                         COUNT_LOCAL_OBJECTS LOC (180,212,0) LOC(216,184,0) 0 LIGHT_TURRET BUILD_COUNT
  182.                         IF(VBL_TEST BUILD_COUNT EQUAL 0)THEN
  183.                         (
  184.                             SHOW_BILLBOARD {You really need some turrets, commander.  Gattling Turrets are "F7" and SAM's are "F9." (or, there's the "F" key} 8
  185.                             CHANGE_VBL CITADEL_TIMER SET GAME_TIME 
  186.                             CHANGE_VBL CITADEL_TIMER ADD 10
  187.                             CHANGE_VBL CITADEL_SWITCH SET 5
  188.                         )
  189.                     )
  190.                 )
  191.             )
  192.             IF(VBL_TEST BUILD_COUNT GREATER_THAN 0)THEN
  193.             (
  194.                 CHANGE_VBL CITADEL_SWITCH SET 5
  195.             )
  196.         )
  197.         CASE 5:
  198.         (
  199.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  200.             (
  201.                 SHOW_BILLBOARD {To cycle through your citadels, just press "C."}
  202.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  203.                 CHANGE_VBL CITADEL_TIMER ADD 15
  204.             )
  205.             CHANGE_VBL LFL_SETTINGS AAV_RATE SET 2000
  206.             CHANGE_VBL CITADEL_SWITCH SET 6
  207.         )
  208.         CASE 6:
  209.         (
  210.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  211.             (
  212.                 SHOW_BILLBOARD {Your citadel is lonely, commander.  Press "C" to visit it.}
  213.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  214.                 CHANGE_VBL CITADEL_TIMER ADD 4
  215.                 CHANGE_VBL CITADEL_SWITCH SET 7
  216.             )
  217.             IF(PLAYER_PROPS 0 IN_CITADEL)THEN
  218.             (
  219.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  220.                 CHANGE_VBL CITADEL_TIMER ADD 4
  221.                 CHANGE_VBL CITADEL_SWITCH SET 7
  222.             )
  223.         )
  224.         CASE 7:
  225.         (
  226.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  227.             (
  228.                 IF(PLAYER_PROPS 0 IN_CITADEL)THEN
  229.                 (
  230.                     PLAY_SOUND SPMV_183
  231.                     SHOW_BILLBOARD {WATCH FOR THE TRICHS TO APPEAR AROUND YOU.  SHOOT FIRST, THEN ASK QUESTIONS.  THEN SHOOT AGAIN.}8
  232.                     CHANGE_VBL CITADEL_SWITCH SET 8
  233.                 )
  234.                 IF(NOT(PLAYER_PROPS 0 IN_CITADEL))THEN
  235.                 (
  236.                     CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  237.                     CHANGE_VBL CITADEL_TIMER ADD 10
  238.                     CHANGE_VBL CITADEL_SWITCH SET 9
  239.                 )
  240.             )
  241.         )    
  242.         CASE 8:
  243.         (
  244.             IF(NOT(PLAYER_PROPS 0 IN_CITADEL))THEN
  245.             (
  246.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  247.                 CHANGE_VBL CITADEL_TIMER ADD 10
  248.                 CHANGE_VBL CITADEL_SWITCH SET 9
  249.             )        
  250.         )
  251.         CASE 9:
  252.         (
  253.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  254.             (
  255.                 CREATE_UNIT GROG1 4 SOLDIER LOC (169,195,0) YAW (0) NULL NULL
  256.                 CHANGE_LOC_VBL ALPHA SET LOC (179,197,0)
  257.                 ADD_ORDER_MOVE GROG1 ALPHA
  258.                 CREATE_UNIT GROG2 4 SOLDIER LOC (169,189,0) YAW (0) NULL NULL
  259.                 ADD_ORDER_MOVE GROG2 ALPHA
  260.                 CREATE_UNIT GROG3 4 SOLDIER LOC (170,183,0) YAW (45) NULL NULL
  261.                 ADD_ORDER_MOVE GROG3 ALPHA
  262.                 CREATE_UNIT GROG4 4 SOLDIER LOC (172,178,0) YAW (45) NULL NULL
  263.                 ADD_ORDER_MOVE GROG4 ALPHA
  264.                 CREATE_UNIT GROG5 4 SWARM_LIGHTTANK LOC (164,197,0) YAW (20) NULL NULL
  265.                 ADD_ORDER_MOVE GROG5 ALPHA
  266.                 CREATE_UNIT GROG6 4 SWARM_LIGHTTANK LOC (168,186,0) YAW (50) NULL NULL
  267.                 ADD_ORDER_MOVE GROG6 ALPHA
  268.                 CREATE_UNIT GROG7 4 AAV LOC (165,194,0) YAW (30) NULL NULL
  269.                 ADD_ORDER_MOVE GROG7 ALPHA
  270.  
  271.                 CREATE_UNIT BUNK1 4 SOLDIER LOC (187,176,0) YAW (45) NULL NULL
  272.                 CHANGE_LOC_VBL ALPHA SET LOC (195,188,0)
  273.                 ADD_ORDER_MOVE BUNK1 ALPHA
  274.                 CREATE_UNIT BUNK2 4 SOLDIER LOC (192,174,0) YAW (45) NULL NULL
  275.                 ADD_ORDER_MOVE BUNK2 ALPHA
  276.                 CREATE_UNIT BUNK3 4 SOLDIER LOC (197,173,0) YAW (90) NULL NULL
  277.                 ADD_ORDER_MOVE BUNK3 ALPHA
  278.                 CREATE_UNIT BUNK4 4 SOLDIER LOC (202,173,0) YAW (90) NULL NULL
  279.                 ADD_ORDER_MOVE BUNK4 ALPHA
  280.                 CREATE_UNIT BUNK5 4 SWARM_LIGHTTANK LOC (192,171,0) YAW (80) NULL NULL
  281.                 ADD_ORDER_MOVE BUNK5 ALPHA
  282.                 CREATE_UNIT BUNK6 4 AAV LOC (199,170,0) YAW (50) NULL NULL
  283.                 ADD_ORDER_MOVE BUNK6 ALPHA
  284.                 CREATE_UNIT BUNK7 4 AAV LOC (187,170,0) YAW (90) NULL NULL
  285.                 ADD_ORDER_MOVE BUNK7 ALPHA
  286.                 IF(NOT(PLAYER_PROPS 0 IN_OVERHEAD_MAP))THEN
  287.                 (
  288.                     SHOW_BILLBOARD {HURRY, COMMANDER!  PRESS "C" AND HELP DEFEND YOUR BASE.}
  289.                 )
  290.                 CHANGE_VBL CITADEL_TIMER SET GAME_TIME
  291.                 CHANGE_VBL CITADEL_TIMER ADD 10
  292.                 CHANGE_VBL CITADEL_SWITCH SET 10
  293.             )
  294.         )
  295.         CASE 10:
  296.         (
  297.             IF(VBL_TEST CITADEL_TIMER LESS_THAN GAME_TIME)THEN
  298.             (
  299.                 IF(PLAYER_PROPS 0 IN_CITADEL)THEN
  300.                 (
  301.                     SHOW_BILLBOARD {REMEMBER, YOU CAN ALSO SUMMON TROOPS AND TURRETS FROM HERE. (DON'T FORGET THE "F" KEY)} 8
  302.                 )
  303.                 CHANGE_VBL CITADEL_SWITCH SET 11
  304.             )
  305.         )
  306.         CASE 11:
  307.         (
  308.             CHANGE_VBL LFL_SETTINGS AAV_RATE SET 1000
  309.             CHANGE_VBL LFL_SETTINGS IMPERIUM_ATTACK_RATE SET 10000
  310.             CHANGE_VBL CITADEL_SWITCH SET 999
  311.         )            
  312.     )
  313.     IF(AND((CITADEL_OWNED_W_STRG_TOWER 0 0)(VBL_TEST CIT0OWNED EQUAL 0))) THEN
  314.     (
  315.         SHOW_BILLBOARD {NICE WORK, COMMANDER.}
  316.         PLAY_SOUND SPMV_086
  317.         CHANGE_VBL CIT0OWNED SET 1
  318.     )    
  319.     IF(AND((CITADEL_OWNED_W_STRG_TOWER 0 2)(VBL_TEST ALLFOUR EQUAL 0))) THEN
  320.     (
  321.         IF(AND((CITADEL_OWNED_W_STRG_TOWER 0 0)AND((CITADEL_OWNED_W_STRG_TOWER 0 1)(CITADEL_OWNED_W_STRG_TOWER 0 4)))) THEN
  322.         (
  323.             SHOW_BILLBOARD {NOW CRUSH THEM!}
  324.             PLAY_SOUND SPMV_187
  325.             CHANGE_VBL ALLFOUR SET 1
  326.         )
  327.     )
  328.     IF(AND((CLOSE_PT HTANK0 LOC(177,124,0) 5)(VBL_TEST BRIDGE EQUAL 0))) THEN
  329.     (
  330.         SHOW_BILLBOARD {MASSIVE TRICH FORCE AHEAD!  THIS WILL BE A CHALLENGE, SIR.}
  331.         PLAY_SOUND SPMV_311
  332.         CHANGE_VBL BRIDGE SET 1
  333.     )    
  334.     IF(CITADEL_OWNED_W_STRG_TOWER 0 3) THEN 
  335.     (
  336.         PLAY_SOUND SPMV_030
  337.         SHOW_BILLBOARD {NICE SHOOTING, COMMANDER.  COME ON HOME.}
  338.         COUNT_OBJECTS 5 SOLDIER SOLDIER_COUNT
  339.         IF(VBL_TEST SOLDIER_COUNT EQUAL 0)THEN
  340.         (
  341.             COUNT_OBJECTS 5 AI_TANK TANK_COUNT
  342.             IF(VBL_TEST TANK_COUNT EQUAL 0)THEN
  343.             (
  344.                 COUNT_OBJECTS 5 AAV AAV_COUNT
  345.                 IF(VBL_TEST AAV_COUNT EQUAL 0)THEN
  346.                 (
  347.                     COUNT_OBJECTS 5 LIGHT_TURRET LTUR_COUNT
  348.                     IF(VBL_TEST LTUR_COUNT EQUAL 0)THEN
  349.                     (
  350.                         COUNT_OBJECTS 5 HEAVY_TURRET HTUR_COUNT
  351.                         IF(VBL_TEST HTUR_COUNT EQUAL 0)THEN
  352.                         (
  353.                             CHANGE_VBL GOTSECOND SET 1
  354.                         )
  355.                     )
  356.                 )
  357.             )
  358.         )
  359.  
  360.         IF(CITADEL_OWNED_W_STRG_TOWER 0 ALL)THEN
  361.         (
  362.             CHANGE_VBL GOTBONUS SET 1
  363.         )
  364.         
  365.         SWITCH GOTSECOND
  366.         (
  367.  
  368.             CASE 0:
  369.             (
  370.             DEBRIEF_SECONDARY 0 0 {A pity some of the support forces survived.  They'll be back.}
  371.             )
  372.             CASE 1:
  373.             (
  374.             DEBRIEF_SECONDARY 0 1 {All the support forces have been destroyed!}
  375.             )
  376.         )    
  377.  
  378.         SWITCH GOTBONUS
  379.         (
  380.  
  381.             CASE 0:
  382.             (
  383.             DEBRIEF_BONUS 0 0 {We managed to capture the remaining citadels, but it cost us.}
  384.             )
  385.             CASE 1:
  386.             (
  387.             DEBRIEF_BONUS 0 1 {You managed to capture every citadel and save our boys a lot of grief.}
  388.             )
  389.         )
  390.         DEBRIEF_SUMMARY {Excellent job, commander.  The outpost is secure and you really gave the Trich a bloody nose.  Maybe it's time you got into the real war.}
  391.         DEBRIEF_PRIMARY 0 1 {The central fortress has been taken and the outpost is ours!}
  392.         END_MISSION 0 1 8 {Zowie!}
  393.     )
  394.  
  395.  
  396. END_SCRIPT_FILE
  397.  
  398.